home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / Libraries / DCLAP 6d / dclap6d / corelib / ncbitime.c < prev    next >
Text File  |  1996-07-05  |  4KB  |  140 lines
  1. /*  ncbitime.c
  2. * ===========================================================================
  3. *
  4. *                            PUBLIC DOMAIN NOTICE                          
  5. *               National Center for Biotechnology Information
  6. *                                                                          
  7. *  This software/database is a "United States Government Work" under the   
  8. *  terms of the United States Copyright Act.  It was written as part of    
  9. *  the author's official duties as a United States Government employee and 
  10. *  thus cannot be copyrighted.  This software/database is freely available 
  11. *  to the public for use. The National Library of Medicine and the U.S.    
  12. *  Government have not placed any restriction on its use or reproduction.  
  13. *                                                                          
  14. *  Although all reasonable efforts have been taken to ensure the accuracy  
  15. *  and reliability of the software and data, the NLM and the U.S.          
  16. *  Government do not and cannot warrant the performance or results that    
  17. *  may be obtained by using this software or data. The NLM and the U.S.    
  18. *  Government disclaim all warranties, express or implied, including       
  19. *  warranties of performance, merchantability or fitness for any particular
  20. *  purpose.                                                                
  21. *                                                                          
  22. *  Please cite the author in any work or product based on this material.   
  23. *
  24. * ===========================================================================
  25. *
  26. * File Name:  ncbitime.c
  27. *
  28. * Author:  Ostell, Kans
  29. *
  30. * Version Creation Date:  1/1/90
  31. *
  32. * $Revision: 2.1 $
  33. *
  34. * File Description:
  35. *   misc portable routines for
  36. *   dates, times, timers
  37. *
  38. * Modifications:  
  39. * --------------------------------------------------------------------------
  40. * Date     Name        Description of modification
  41. * -------  ----------  -----------------------------------------------------
  42. * 04-15-93 Schuler     Changed _cdecl to LIBCALL
  43. * 
  44. * ==========================================================================
  45. */
  46.  
  47. #include <ncbi.h>
  48. #include <ncbiwin.h>
  49.  
  50. char * NCBI_months[12] = {
  51.     "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct",
  52.     "Nov", "Dec"};
  53. static char * ampm[2] = {
  54.     "AM", "PM" };
  55.  
  56.  
  57. /*****************************************************************************
  58. *
  59. *   Nlm_GetSecs()
  60. *       returns computer time in seconds - for timing purposes only
  61. *
  62. *****************************************************************************/
  63. time_t LIBCALL  Nlm_GetSecs (void)
  64.  
  65. {
  66.     return  time(NULL);
  67. }
  68.  
  69. /*****************************************************************************
  70. *
  71. *   Nlm_GetDayTime(DayTimePtr)
  72. *
  73. *****************************************************************************/
  74. Nlm_Boolean LIBCALL  Nlm_GetDayTime (Nlm_DayTimePtr dtp)
  75.  
  76. {
  77.     time_t ltime;
  78.     struct tm *dt;
  79.  
  80.     Nlm_MemFill ((Nlm_VoidPtr) dtp, 0, sizeof(Nlm_DayTime));
  81.     time(<ime);
  82.     if ((dt = localtime (<ime)) != NULL)
  83.      {
  84.         Nlm_MemCopy ((Nlm_VoidPtr) dtp, (Nlm_VoidPtr) dt, sizeof (struct tm));
  85.         return TRUE;
  86.     }
  87.     return FALSE;
  88. }
  89.  
  90. /*****************************************************************************
  91. *
  92. *   Nlm_DayTimeStr(buf, date, time)
  93. *       fills buffer with formatted date and/or time
  94. *       date requires a 13 character buffer
  95. *       time requeres a 10 character buffer
  96. *       data and time takes 23
  97. *
  98. *       eg.   "Jan 28, 1988 12:59 PM"
  99. *
  100. *****************************************************************************/
  101. Nlm_Boolean LIBCALL  Nlm_DayTimeStr (Nlm_CharPtr buf, Nlm_Boolean nlm_date, Nlm_Boolean nlm_time)
  102.  
  103. {
  104.     Nlm_DayTime dt;
  105.     char localbuf[30];
  106.     int pm;
  107.     
  108.     buf[0] = '\0';
  109.  
  110.     if ( ! Nlm_GetDayTime(&dt))
  111.         return FALSE;
  112.  
  113.     if (nlm_date)
  114.     {
  115.         sprintf (localbuf, "%s %d, %d", NCBI_months [dt.tm_mon], 
  116.                     dt.tm_mday, dt.tm_year + 1900);
  117.         StringCpy (buf, localbuf);
  118.     }
  119.     if (nlm_time)
  120.     {
  121.         pm = 1;
  122.         if (dt.tm_hour == 0)
  123.         {
  124.             dt.tm_hour = 12;
  125.             pm = 0;
  126.         }
  127.         else if (dt.tm_hour < 12)
  128.             pm = 0;
  129.         else if (dt.tm_hour > 12)
  130.             dt.tm_hour -= 12;
  131.  
  132.         sprintf (localbuf, "%3d:%2d %s", dt.tm_hour, dt.tm_min, ampm[pm]);
  133.         if (dt.tm_min < 10)
  134.             localbuf[4] = '0';
  135.         StringCat (buf, localbuf);
  136.     }
  137.     return TRUE;
  138. }
  139.  
  140.